
Partial Class Queries
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Session("type") = "admin" Then
            'lnkProfName.Text = "Logged in as " & Session("admin") & " (admin)"
        Else
            Response.Redirect("Error.aspx")
            Exit Sub
        End If
    End Sub
End Class
